"Barley" <-
structure(list(Site = structure(c(5, 5, 5, 5, 5, 6, 6, 6, 6, 
6, 4, 4, 4, 4, 4, 1, 1, 1, 1, 1, 3, 3, 3, 3, 3, 2, 2, 2, 2, 2, 
5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 4, 4, 4, 4, 4, 1, 1, 1, 1, 1, 3, 
3, 3, 3, 3, 2, 2, 2, 2, 2), class = "factor", .Label = c("C", 
"D", "GR", "M", "UF", "W")), Variety = structure(c(1, 3, 5, 4, 
2, 1, 3, 5, 4, 2, 1, 3, 5, 4, 2, 1, 3, 5, 4, 2, 1, 3, 5, 4, 2, 
1, 3, 5, 4, 2, 1, 3, 5, 4, 2, 1, 3, 5, 4, 2, 1, 3, 5, 4, 2, 1, 
3, 5, 4, 2, 1, 3, 5, 4, 2, 1, 3, 5, 4, 2), .Label = c("Manchuria", 
"Peatland", "Svansota", "Trebi", "Velvet"), class = "factor"), 
    Year = c(1931, 1931, 1931, 1931, 1931, 1931, 1931, 1931, 
    1931, 1931, 1931, 1931, 1931, 1931, 1931, 1931, 1931, 1931, 
    1931, 1931, 1931, 1931, 1931, 1931, 1931, 1931, 1931, 1931, 
    1931, 1931, 1932, 1932, 1932, 1932, 1932, 1932, 1932, 1932, 
    1932, 1932, 1932, 1932, 1932, 1932, 1932, 1932, 1932, 1932, 
    1932, 1932, 1932, 1932, 1932, 1932, 1932, 1932, 1932, 1932, 
    1932, 1932), Yield = c(81, 105.4, 119.7, 109.7, 98.3, 146.6, 
    142, 150.7, 191.5, 145.7, 82.3, 77.3, 78.4, 131.3, 89.6, 
    119.8, 121.4, 124, 140.8, 124.8, 98.9, 89, 69.1, 89.3, 104.1, 
    86.9, 77.1, 78.9, 101.8, 96, 80.7, 82.3, 80.4, 87.2, 84.2, 
    100.4, 115.5, 112.2, 147.7, 108.1, 103.1, 105.1, 116.5, 139.9, 
    129.6, 98.9, 61.9, 96.2, 125.5, 75.7, 66.4, 49.9, 96.7, 61.9, 
    80.3, 67.7, 66.7, 67.4, 91.8, 94.1)), .Names = c("Site", 
"Variety", "Year", "Yield"), row.names = c("1", "2", "3", "4", 
"5", "6", "7", "8", "9", "10", "11", "12", "13", "14", "15", 
"16", "17", "18", "19", "20", "21", "22", "23", "24", "25", "26", 
"27", "28", "29", "30", "31", "32", "33", "34", "35", "36", "37", 
"38", "39", "40", "41", "42", "43", "44", "45", "46", "47", "48", 
"49", "50", "51", "52", "53", "54", "55", "56", "57", "58", "59", 
"60"), class = "data.frame")
